DATOS	SEGMENT


	VAR DB "HOLA MUNDO",13,10,"$"
	IMPRIME_CADENA MACRO 
		MOV DX, OFFSET VAR
		MOV AH,09H
		INT 21H
	ENDM


DATOS ENDS


CODIGO	SEGMENT
	ASSUME CS:CODIGO, DS:DATOS


INICIO:
	MOV AX, DATOS
	MOV DS, AX
	
	IMPRIME_cADENA

	;	SALIR
	MOV AH,4CH
	INT 21

CODIGO ENDS

END INICIO